home *** CD-ROM | disk | FTP | other *** search
/ Dynamic Graphics Magazine (Alt) / Dynamic Graphics Magazine (Version B).iso / pc / dgm / t_runner.dir / 00181.ls < prev    next >
Encoding:
Text File  |  1997-03-25  |  532 b   |  23 lines
  1. on hBtnToggle vchannel, vUpBtnNum, vDnBtnNum
  2.   puppetSound("click")
  3.   updateStage()
  4.   puppetSprite(vchannel, 1)
  5.   repeat while the mouseDown
  6.     set vClickState to setBtn(vchannel, vUpBtnNum, vDnBtnNum)
  7.     updateStage()
  8.   end repeat
  9.   puppetSprite(vchannel, 0)
  10.   return vClickState
  11. end
  12.  
  13. on setBtn vchannel, vUpBtnNum, vDnBtnNum
  14.   if rollOver(vchannel) then
  15.     set the castNum of sprite vchannel to vDnBtnNum
  16.     set flag to 1
  17.   else
  18.     set the castNum of sprite vchannel to vUpBtnNum
  19.     set flag to 0
  20.   end if
  21.   return flag
  22. end
  23.